home *** CD-ROM | disk | FTP | other *** search
/ Amiga Collections: Panorama / Panorama - Disk 01 (1986-02-15)(Pacific North-West Amigas Club)[h AFL][b corrupt files].zip / Panorama - Disk 01 (1986-02-15)(Pacific North-West Amigas Club)[h AFL][b corrupt files].adf / mand6.c < prev    next >
Text File  |  1989-10-24  |  22KB  |  1,000 lines
  1. /*****************************************************************************
  2.  *                  MAND6.C - Color Window Data
  3.  *             Mandelbrot Self-Squared Dragon Generator
  4.  *                    For the Commodore Amiga
  5.  *                         Version 2.01
  6.  *
  7.  *             Copyright (C) 1986, =Robert J. Mical=
  8.  *                  Placed in the Public Domain
  9.  *
  10.  *  This program may be distributed free of charge as long as the above
  11.  *  notice is retained.  You may extract any or all information contained
  12.  *  in this file for use in your own programs
  13.  *
  14.  ****************************************************************************/
  15.  
  16. #include "mand.h"
  17.  
  18.  
  19. /* === The Mandelbrot program definitions ================================= */
  20.  
  21. extern int MathBase, MathTransBase;
  22.  
  23. extern struct   GfxBase       *GfxBase;
  24. extern struct   IntuitionBase *IntuitionBase;
  25.  
  26. extern struct   RastPort      *rp,*rp2;
  27. extern struct   ViewPort      *vp;
  28.  
  29. extern struct   Window        *w,*w2, *ColorWindow;
  30. extern struct   Screen        *screen;
  31. extern struct   IntuiMessage  *message;
  32.  
  33. extern long last_color;
  34.  
  35. extern BOOL SettingCenter, SettingBoxSize;
  36.  
  37. extern union kludge {
  38.    float f;
  39.    int i;
  40. } start_r,end_r,start_i,end_i;  /* Block bounds for set */
  41. extern int max_x,max_y,max_mem_y;  /* Graphics window size */
  42. extern int max_count,color_inc,color_offset,color_set,color_mode,color_div;
  43. extern int color_inset,func_num;
  44.  
  45. extern int v_starty,max_mem;
  46. extern long v_offset;
  47. extern UWORD *color_table,*v_mand_store;
  48.  
  49. extern int modified,want_read;
  50.  
  51. extern FILE *console,*v_fp,*redir_fp;
  52.  
  53. extern SHORT ZoomCenterX, ZoomCenterY, ZoomBoxSizeX, ZoomBoxSizeY;
  54. extern SHORT ZoomBoxStartX, ZoomBoxStartY;
  55.  
  56.  
  57. /*****************************************************************************
  58.  *
  59.  * Color window template initialization and routines, 
  60.  * for colorwindow and cyclewindow
  61.  *
  62.  * Throughout this file, the COLOR_RED and COLOR_GREEN gadgets are in the
  63.  * opposite order you would expect.  
  64.  *
  65.  ****************************************************************************/
  66.  
  67. struct TextAttr SafeFont =
  68.     {
  69.     "topaz.font",
  70.     TOPAZ_EIGHTY,
  71.     0,
  72.     0,
  73.     };
  74.  
  75.  
  76. USHORT RGBData[] =
  77.     {
  78.     0xFC00,
  79.     0x6600,
  80.     0x6600,
  81.     0x7C00,
  82.     0x6C00,
  83.     0x6600,
  84.     0xE300,
  85.     0x0000,
  86.     0x0000,
  87.     0x0000,
  88.     0x0000,
  89.     0x3C00,
  90.     0x6600,
  91.     0xC000,
  92.     0xCE00,
  93.     0xC600,
  94.     0x6600,
  95.     0x3E00,
  96.     0x0000,
  97.     0x0000,
  98.     0x0000,
  99.     0x0000,
  100.     0xFC00,
  101.     0x6600,
  102.     0x6600,
  103.     0x7C00,
  104.     0x6600,
  105.     0x6600,
  106.     0xFC00,
  107.     };
  108.  
  109.  
  110. struct Image ColorRGBImage =
  111.     {
  112.     3, 1,
  113.     8, 
  114.     29,
  115.     1,
  116.     &RGBData[0],
  117.     0x1, 0x0,
  118.     NULL,
  119.     };
  120.  
  121.  
  122. SHORT ClusterBorderVectors[] =
  123.     {
  124.     -1, -1,
  125.     -1, COLOR_CLUSTER_HEIGHT,
  126.     COLOR_CLUSTER_WIDTH, COLOR_CLUSTER_HEIGHT,
  127.     COLOR_CLUSTER_WIDTH, -1,
  128.     -1, -1,
  129.     };
  130.  
  131.  
  132. struct Border ColorClusterBorder =
  133.     {
  134.     0, 0, 
  135.     1, 0,
  136.     JAM1,
  137.     5,
  138.     &ClusterBorderVectors[0],
  139.     NULL,
  140.     };
  141.  
  142. struct IntuiText ColorClusterText[4] =
  143.     {
  144.     /* "COPY" */
  145.         {
  146.         1, 0,
  147.         JAM2,
  148.         2 + CHARACTER_WIDTH, 1, 
  149.         &SafeFont,
  150.         "COPY",
  151.         NULL,
  152.         },
  153.  
  154.     /* "RANGE" */
  155.         {
  156.         1, 0, 
  157.         JAM2,
  158.         2 + (CHARACTER_WIDTH >> 1), 1, 
  159.         &SafeFont,
  160.         "RANGE",
  161.         NULL,
  162.         },
  163.  
  164.     /* "OK" */
  165.         {
  166.         1, 0, 
  167.         JAM2,
  168.         2 + (CHARACTER_WIDTH << 1), 1, 
  169.         &SafeFont,
  170.         "OK",
  171.         NULL,
  172.         },
  173.  
  174.     /* "CANCEL" */
  175.         {
  176.         1, 0, 
  177.         JAM2,
  178.         2, 1, 
  179.         &SafeFont,
  180.         "CANCEL",
  181.         NULL,
  182.         },
  183.  
  184.     };
  185.  
  186.  
  187.  
  188.  
  189. /* ======================================================================== */
  190. /* ======================================================================== */
  191. /* ======================================================================== */
  192.  
  193. /* RJM anchor */
  194. struct Image ColorPropsImages[3];
  195. struct Image SuperColorImages[32];
  196.  
  197.  
  198. struct PropInfo ColorPropsInfos[3] = 
  199.     {
  200.         {
  201.         /* COLOR_GREEN */
  202.         AUTOKNOB | FREEHORIZ,
  203.         0,
  204.         0,
  205.         COLOR_KNOB_BODY,
  206.         0,
  207.         0, 0, 0, 0, 0, 0,
  208.         },
  209.  
  210.         {
  211.         /* COLOR_RED */
  212.         AUTOKNOB | FREEHORIZ,
  213.         0,
  214.         0,
  215.         COLOR_KNOB_BODY,
  216.         0,
  217.         0, 0, 0, 0, 0, 0,
  218.         },
  219.  
  220.         {
  221.         /* COLOR_BLUE */
  222.         AUTOKNOB | FREEHORIZ,
  223.         0,
  224.         0,
  225.         COLOR_KNOB_BODY,
  226.         0,
  227.         0, 0, 0, 0, 0, 0,
  228.         },
  229.  
  230.     };
  231.  
  232.  
  233. struct Gadget ColorTemplateGadgets[COLOR_GADGETS_COUNT] =
  234.     {
  235.         {
  236.         /* COLOR_00 */
  237.         NULL,
  238.         COLOR_BOX_LEFT + ((00 & 0x7) * 15),
  239.         COLOR_COLOR_TOP + ((00 >> 3) * 10),
  240.         15,
  241.         10,
  242.         GADGIMAGE,
  243.         GADGIMMEDIATE,
  244.         BOOLGADGET,
  245.         (APTR)&SuperColorImages[00],
  246.         NULL,
  247.         NULL,
  248.         NULL,
  249.         NULL,
  250.         00,
  251.         NULL,
  252.         },
  253.  
  254.         {
  255.         /* COLOR_01 */
  256.         &ColorTemplateGadgets[00],
  257.         COLOR_BOX_LEFT + ((01 & 0x7) * 15),
  258.         COLOR_COLOR_TOP + ((01 >> 3) * 10),
  259.         15,
  260.         10,
  261.         GADGIMAGE,
  262.         GADGIMMEDIATE,
  263.         BOOLGADGET,
  264.         (APTR)&SuperColorImages[01],
  265.         NULL,
  266.         NULL,
  267.         NULL,
  268.         NULL,
  269.         01,
  270.         NULL,
  271.         },
  272.  
  273.         {
  274.         /* COLOR_02 */
  275.         &ColorTemplateGadgets[01],
  276.         COLOR_BOX_LEFT + ((02 & 0x7) * 15),
  277.         COLOR_COLOR_TOP + ((02 >> 3) * 10),
  278.         15,
  279.         10,
  280.         GADGIMAGE,
  281.         GADGIMMEDIATE,
  282.         BOOLGADGET,
  283.         (APTR)&SuperColorImages[02],
  284.         NULL,
  285.         NULL,
  286.         NULL,
  287.         NULL,
  288.         02,
  289.         NULL,
  290.         },
  291.  
  292.         {
  293.         /* COLOR_03 */
  294.         &ColorTemplateGadgets[02],
  295.         COLOR_BOX_LEFT + ((03 & 0x7) * 15),
  296.         COLOR_COLOR_TOP + ((03 >> 3) * 10),
  297.         15,
  298.         10,
  299.         GADGIMAGE,
  300.         GADGIMMEDIATE,
  301.         BOOLGADGET,
  302.         (APTR)&SuperColorImages[03],
  303.         NULL,
  304.         NULL,
  305.         NULL,
  306.         NULL,
  307.         03,
  308.         NULL,
  309.         },
  310.  
  311.         {
  312.         /* COLOR_04 */
  313.         &ColorTemplateGadgets[03],
  314.         COLOR_BOX_LEFT + ((04 & 0x7) * 15),
  315.         COLOR_COLOR_TOP + ((04 >> 3) * 10),
  316.         15,
  317.         10,
  318.         GADGIMAGE,
  319.         GADGIMMEDIATE,
  320.         BOOLGADGET,
  321.         (APTR)&SuperColorImages[04],
  322.         NULL,
  323.         NULL,
  324.         NULL,
  325.         NULL,
  326.         04,
  327.         NULL,
  328.         },
  329.  
  330.         {
  331.         /* COLOR_05 */
  332.         &ColorTemplateGadgets[04],
  333.         COLOR_BOX_LEFT + ((05 & 0x7) * 15),
  334.         COLOR_COLOR_TOP + ((05 >> 3) * 10),
  335.         15,
  336.         10,
  337.         GADGIMAGE,
  338.         GADGIMMEDIATE,
  339.         BOOLGADGET,
  340.         (APTR)&SuperColorImages[05],
  341.         NULL,
  342.         NULL,
  343.         NULL,
  344.         NULL,
  345.         05,
  346.         NULL,
  347.         },
  348.  
  349.         {
  350.         /* COLOR_06 */
  351.         &ColorTemplateGadgets[05],
  352.         COLOR_BOX_LEFT + ((06 & 0x7) * 15),
  353.         COLOR_COLOR_TOP + ((06 >> 3) * 10),
  354.         15,
  355.         10,
  356.         GADGIMAGE,
  357.         GADGIMMEDIATE,
  358.         BOOLGADGET,
  359.         (APTR)&SuperColorImages[06],
  360.         NULL,
  361.         NULL,
  362.         NULL,
  363.         NULL,
  364.         06,
  365.         NULL,
  366.         },
  367.  
  368.         {
  369.         /* COLOR_07 */
  370.         &ColorTemplateGadgets[06],
  371.         COLOR_BOX_LEFT + ((07 & 0x7) * 15),
  372.         COLOR_COLOR_TOP + ((07 >> 3) * 10),
  373.         15,
  374.         10,
  375.         GADGIMAGE,
  376.         GADGIMMEDIATE,
  377.         BOOLGADGET,
  378.         (APTR)&SuperColorImages[07],
  379.         NULL,
  380.         NULL,
  381.         NULL,
  382.         NULL,
  383.         07,
  384.         NULL,
  385.         },
  386.  
  387.         {
  388.         /* COLOR_08 */
  389.         &ColorTemplateGadgets[07],
  390.         COLOR_BOX_LEFT + ((08 & 0x7) * 15),
  391.         COLOR_COLOR_TOP + ((08 >> 3) * 10),
  392.         15,
  393.         10,
  394.         GADGIMAGE,
  395.         GADGIMMEDIATE,
  396.         BOOLGADGET,
  397.         (APTR)&SuperColorImages[08],
  398.         NULL,
  399.         NULL,
  400.         NULL,
  401.         NULL,
  402.         08,
  403.         NULL,
  404.         },
  405.  
  406.         {
  407.         /* COLOR_09 */
  408.         &ColorTemplateGadgets[08],
  409.         COLOR_BOX_LEFT + ((09 & 0x7) * 15),
  410.         COLOR_COLOR_TOP + ((09 >> 3) * 10),
  411.         15,
  412.         10,
  413.         GADGIMAGE,
  414.         GADGIMMEDIATE,
  415.         BOOLGADGET,
  416.         (APTR)&SuperColorImages[09],
  417.         NULL,
  418.         NULL,
  419.         NULL,
  420.         NULL,
  421.         09,
  422.         NULL,
  423.         },
  424.  
  425.         {
  426.         /* COLOR_10 */
  427.         &ColorTemplateGadgets[09],
  428.         COLOR_BOX_LEFT + ((10 & 0x7) * 15),
  429.         COLOR_COLOR_TOP + ((10 >> 3) * 10),
  430.         15,
  431.         10,
  432.         GADGIMAGE,
  433.         GADGIMMEDIATE,
  434.         BOOLGADGET,
  435.         (APTR)&SuperColorImages[10],
  436.         NULL,
  437.         NULL,
  438.         NULL,
  439.         NULL,
  440.         10,
  441.         NULL,
  442.         },
  443.  
  444.         {
  445.         /* COLOR_11 */
  446.         &ColorTemplateGadgets[10],
  447.         COLOR_BOX_LEFT + ((11 & 0x7) * 15),
  448.         COLOR_COLOR_TOP + ((11 >> 3) * 10),
  449.         15,
  450.         10,
  451.         GADGIMAGE,
  452.         GADGIMMEDIATE,
  453.         BOOLGADGET,
  454.         (APTR)&SuperColorImages[11],
  455.         NULL,
  456.         NULL,
  457.         NULL,
  458.         NULL,
  459.         11,
  460.         NULL,
  461.         },
  462.  
  463.         {
  464.         /* COLOR_12 */
  465.         &ColorTemplateGadgets[11],
  466.         COLOR_BOX_LEFT + ((12 & 0x7) * 15),
  467.         COLOR_COLOR_TOP + ((12 >> 3) * 10),
  468.         15,
  469.         10,
  470.         GADGIMAGE,
  471.         GADGIMMEDIATE,
  472.         BOOLGADGET,
  473.         (APTR)&SuperColorImages[12],
  474.         NULL,
  475.         NULL,
  476.         NULL,
  477.         NULL,
  478.         12,
  479.         NULL,
  480.         },
  481.  
  482.         {
  483.         /* COLOR_13 */
  484.         &ColorTemplateGadgets[12],
  485.         COLOR_BOX_LEFT + ((13 & 0x7) * 15),
  486.         COLOR_COLOR_TOP + ((13 >> 3) * 10),
  487.         15,
  488.         10,
  489.         GADGIMAGE,
  490.         GADGIMMEDIATE,
  491.         BOOLGADGET,
  492.         (APTR)&SuperColorImages[13],
  493.         NULL,
  494.         NULL,
  495.         NULL,
  496.         NULL,
  497.         13,
  498.         NULL,
  499.         },
  500.  
  501.         {
  502.         /* COLOR_14 */
  503.         &ColorTemplateGadgets[13],
  504.         COLOR_BOX_LEFT + ((14 & 0x7) * 15),
  505.         COLOR_COLOR_TOP + ((14 >> 3) * 10),
  506.         15,
  507.         10,
  508.         GADGIMAGE,
  509.         GADGIMMEDIATE,
  510.         BOOLGADGET,
  511.         (APTR)&SuperColorImages[14],
  512.         NULL,
  513.         NULL,
  514.         NULL,
  515.         NULL,
  516.         14,
  517.         NULL,
  518.         },
  519.  
  520.         {
  521.         /* COLOR_15 */
  522.         &ColorTemplateGadgets[14],
  523.         COLOR_BOX_LEFT + ((15 & 0x7) * 15),
  524.         COLOR_COLOR_TOP + ((15 >> 3) * 10),
  525.         15,
  526.         10,
  527.         GADGIMAGE,
  528.         GADGIMMEDIATE,
  529.         BOOLGADGET,
  530.         (APTR)&SuperColorImages[15],
  531.         NULL,
  532.         NULL,
  533.         NULL,
  534.         NULL,
  535.         15,
  536.         NULL,
  537.         },
  538.  
  539.         {
  540.         /* COLOR_16 */
  541.         &ColorTemplateGadgets[15],
  542.         COLOR_BOX_LEFT + ((16 & 0x7) * 15),
  543.         COLOR_COLOR_TOP + ((16 >> 3) * 10),
  544.         15,
  545.         10,
  546.         GADGIMAGE,
  547.         GADGIMMEDIATE,
  548.         BOOLGADGET,
  549.         (APTR)&SuperColorImages[16],
  550.         NULL,
  551.         NULL,
  552.         NULL,
  553.         NULL,
  554.         16,
  555.         NULL,
  556.         },
  557.  
  558.         {
  559.         /* COLOR_17 */
  560.         &ColorTemplateGadgets[16],
  561.         COLOR_BOX_LEFT + ((17 & 0x7) * 15),
  562.         COLOR_COLOR_TOP + ((17 >> 3) * 10),
  563.         15,
  564.         10,
  565.         GADGIMAGE,
  566.         GADGIMMEDIATE,
  567.         BOOLGADGET,
  568.         (APTR)&SuperColorImages[17],
  569.         NULL,
  570.         NULL,
  571.         NULL,
  572.         NULL,
  573.         17,
  574.         NULL,
  575.         },
  576.  
  577.         {
  578.         /* COLOR_18 */
  579.         &ColorTemplateGadgets[17],
  580.         COLOR_BOX_LEFT + ((18 & 0x7) * 15),
  581.         COLOR_COLOR_TOP + ((18 >> 3) * 10),
  582.         15,
  583.         10,
  584.         GADGIMAGE,
  585.         GADGIMMEDIATE,
  586.         BOOLGADGET,
  587.         (APTR)&SuperColorImages[18],
  588.         NULL,
  589.         NULL,
  590.         NULL,
  591.         NULL,
  592.         18,
  593.         NULL,
  594.         },
  595.  
  596.         {
  597.         /* COLOR_19 */
  598.         &ColorTemplateGadgets[18],
  599.         COLOR_BOX_LEFT + ((19 & 0x7) * 15),
  600.         COLOR_COLOR_TOP + ((19 >> 3) * 10),
  601.         15,
  602.         10,
  603.         GADGIMAGE,
  604.         GADGIMMEDIATE,
  605.         BOOLGADGET,
  606.         (APTR)&SuperColorImages[19],
  607.         NULL,
  608.         NULL,
  609.         NULL,
  610.         NULL,
  611.         19,
  612.         NULL,
  613.         },
  614.  
  615.         {
  616.         /* COLOR_20 */
  617.         &ColorTemplateGadgets[19],
  618.         COLOR_BOX_LEFT + ((20 & 0x7) * 15),
  619.         COLOR_COLOR_TOP + ((20 >> 3) * 10),
  620.         15,
  621.         10,
  622.         GADGIMAGE,
  623.         GADGIMMEDIATE,
  624.         BOOLGADGET,
  625.         (APTR)&SuperColorImages[20],
  626.         NULL,
  627.         NULL,
  628.         NULL,
  629.         NULL,
  630.         20,
  631.         NULL,
  632.         },
  633.  
  634.         {
  635.         /* COLOR_21 */
  636.         &ColorTemplateGadgets[20],
  637.         COLOR_BOX_LEFT + ((21 & 0x7) * 15),
  638.         COLOR_COLOR_TOP + ((21 >> 3) * 10),
  639.         15,
  640.         10,
  641.         GADGIMAGE,
  642.         GADGIMMEDIATE,
  643.         BOOLGADGET,
  644.         (APTR)&SuperColorImages[21],
  645.         NULL,
  646.         NULL,
  647.         NULL,
  648.         NULL,
  649.         21,
  650.         NULL,
  651.         },
  652.  
  653.         {
  654.         /* COLOR_22 */
  655.         &ColorTemplateGadgets[21],
  656.         COLOR_BOX_LEFT + ((22 & 0x7) * 15),
  657.         COLOR_COLOR_TOP + ((22 >> 3) * 10),
  658.         15,
  659.         10,
  660.         GADGIMAGE,
  661.         GADGIMMEDIATE,
  662.         BOOLGADGET,
  663.         (APTR)&SuperColorImages[22],
  664.         NULL,
  665.         NULL,
  666.         NULL,
  667.         NULL,
  668.         22,
  669.         NULL,
  670.         },
  671.  
  672.         {
  673.         /* COLOR_23 */
  674.         &ColorTemplateGadgets[22],
  675.         COLOR_BOX_LEFT + ((23 & 0x7) * 15),
  676.         COLOR_COLOR_TOP + ((23 >> 3) * 10),
  677.         15,
  678.         10,
  679.         GADGIMAGE,
  680.         GADGIMMEDIATE,
  681.         BOOLGADGET,
  682.         (APTR)&SuperColorImages[23],
  683.         NULL,
  684.         NULL,
  685.         NULL,
  686.         NULL,
  687.         23,
  688.         NULL,
  689.         },
  690.  
  691.         {
  692.         /* COLOR_24 */
  693.         &ColorTemplateGadgets[23],
  694.         COLOR_BOX_LEFT + ((24 & 0x7) * 15),
  695.         COLOR_COLOR_TOP + ((24 >> 3) * 10),
  696.         15,
  697.         10,
  698.         GADGIMAGE,
  699.         GADGIMMEDIATE,
  700.         BOOLGADGET,
  701.         (APTR)&SuperColorImages[24],
  702.         NULL,
  703.         NULL,
  704.         NULL,
  705.         NULL,
  706.         24,
  707.         NULL,
  708.         },
  709.  
  710.         {
  711.         /* COLOR_25 */
  712.         &ColorTemplateGadgets[24],
  713.         COLOR_BOX_LEFT + ((25 & 0x7) * 15),
  714.         COLOR_COLOR_TOP + ((25 >> 3) * 10),
  715.         15,
  716.         10,
  717.         GADGIMAGE,
  718.         GADGIMMEDIATE,
  719.         BOOLGADGET,
  720.         (APTR)&SuperColorImages[25],
  721.         NULL,
  722.         NULL,
  723.         NULL,
  724.         NULL,
  725.         25,
  726.         NULL,
  727.         },
  728.  
  729.         {
  730.         /* COLOR_26 */
  731.         &ColorTemplateGadgets[25],
  732.         COLOR_BOX_LEFT + ((26 & 0x7) * 15),
  733.         COLOR_COLOR_TOP + ((26 >> 3) * 10),
  734.         15,
  735.         10,
  736.         GADGIMAGE,
  737.         GADGIMMEDIATE,
  738.         BOOLGADGET,
  739.         (APTR)&SuperColorImages[26],
  740.         NULL,
  741.         NULL,
  742.         NULL,
  743.         NULL,
  744.         26,
  745.         NULL,
  746.         },
  747.  
  748.         {
  749.         /* COLOR_27 */
  750.         &ColorTemplateGadgets[26],
  751.         COLOR_BOX_LEFT + ((27 & 0x7) * 15),
  752.         COLOR_COLOR_TOP + ((27 >> 3) * 10),
  753.         15,
  754.         10,
  755.         GADGIMAGE,
  756.         GADGIMMEDIATE,
  757.         BOOLGADGET,
  758.         (APTR)&SuperColorImages[27],
  759.         NULL,
  760.         NULL,
  761.         NULL,
  762.         NULL,
  763.         27,
  764.         NULL,
  765.         },
  766.  
  767.         {
  768.         /* COLOR_28 */
  769.         &ColorTemplateGadgets[27],
  770.         COLOR_BOX_LEFT + ((28 & 0x7) * 15),
  771.         COLOR_COLOR_TOP + ((28 >> 3) * 10),
  772.         15,
  773.         10,
  774.         GADGIMAGE,
  775.         GADGIMMEDIATE,
  776.         BOOLGADGET,
  777.         (APTR)&SuperColorImages[28],
  778.         NULL,
  779.         NULL,
  780.         NULL,
  781.         NULL,
  782.         28,
  783.         NULL,
  784.         },
  785.  
  786.         {
  787.         /* COLOR_29 */
  788.         &ColorTemplateGadgets[28],
  789.         COLOR_BOX_LEFT + ((29 & 0x7) * 15),
  790.         COLOR_COLOR_TOP + ((29 >> 3) * 10),
  791.         15,
  792.         10,
  793.         GADGIMAGE,
  794.         GADGIMMEDIATE,
  795.         BOOLGADGET,
  796.         (APTR)&SuperColorImages[29],
  797.         NULL,
  798.         NULL,
  799.         NULL,
  800.         NULL,
  801.         29,
  802.         NULL,
  803.         },
  804.  
  805.         {
  806.         /* COLOR_30 */
  807.         &ColorTemplateGadgets[29],
  808.         COLOR_BOX_LEFT + ((30 & 0x7) * 15),
  809.         COLOR_COLOR_TOP + ((30 >> 3) * 10),
  810.         15,
  811.         10,
  812.         GADGIMAGE,
  813.         GADGIMMEDIATE,
  814.         BOOLGADGET,
  815.         (APTR)&SuperColorImages[30],
  816.         NULL,
  817.         NULL,
  818.         NULL,
  819.         NULL,
  820.         30,
  821.         NULL,
  822.         },
  823.  
  824.         {
  825.         /* COLOR_31 */
  826.         &ColorTemplateGadgets[30],
  827.         COLOR_BOX_LEFT + ((31 & 0x7) * 15),
  828.         COLOR_COLOR_TOP + ((31 >> 3) * 10),
  829.         15,
  830.         10,
  831.         GADGIMAGE,
  832.         GADGIMMEDIATE,
  833.         BOOLGADGET,
  834.         (APTR)&SuperColorImages[31],
  835.         NULL,
  836.         NULL,
  837.         NULL,
  838.         NULL,
  839.         31,
  840.         NULL,
  841.         },
  842.  
  843.         {
  844.         /* COLOR_COPY */
  845.         &ColorTemplateGadgets[31],
  846.         COLOR_CLUSTER_LEFT,
  847.         COLOR_CLUSTER_TOP + (00 * (COLOR_CLUSTER_HEIGHT + 3)),
  848.         COLOR_CLUSTER_WIDTH,
  849.         COLOR_CLUSTER_HEIGHT,
  850.         GADGHCOMP,
  851.         RELVERIFY,
  852.         BOOLGADGET,
  853.         (APTR)&ColorClusterBorder,
  854.         NULL,
  855.         &ColorClusterText[00],
  856.         NULL,
  857.         NULL,
  858.         COLOR_COPY,
  859.         NULL,
  860.         },
  861.  
  862.         {
  863.         /* COLOR_RANGE */
  864.         &ColorTemplateGadgets[COLOR_COPY],
  865.         COLOR_CLUSTER_LEFT,
  866.         COLOR_CLUSTER_TOP + (01 * (COLOR_CLUSTER_HEIGHT + 3)),
  867.         COLOR_CLUSTER_WIDTH,
  868.         COLOR_CLUSTER_HEIGHT,
  869.         GADGHCOMP,
  870.         RELVERIFY,
  871.         BOOLGADGET,
  872.         (APTR)&ColorClusterBorder,
  873.         NULL,
  874.         &ColorClusterText[01],
  875.         NULL,
  876.         NULL,
  877.         COLOR_RANGE,
  878.         NULL,
  879.         },
  880.  
  881.         {
  882.         /* COLOR_OK */
  883.         &ColorTemplateGadgets[COLOR_RANGE],
  884.         COLOR_CLUSTER_LEFT,
  885.         COLOR_CLUSTER_TOP + (02 * (COLOR_CLUSTER_HEIGHT + 3)),
  886.         COLOR_CLUSTER_WIDTH,
  887.         COLOR_CLUSTER_HEIGHT,
  888.         GADGHCOMP,
  889.         RELVERIFY,
  890.         BOOLGADGET,
  891.         (APTR)&ColorClusterBorder,
  892.         NULL,
  893.         &ColorClusterText[02],
  894.         NULL,
  895.         NULL,
  896.         COLOR_OK,
  897.         NULL,
  898.         },
  899.  
  900.         {
  901.         /* COLOR_CANCEL */
  902.         &ColorTemplateGadgets[COLOR_OK],
  903.         COLOR_CLUSTER_LEFT,
  904.         COLOR_CLUSTER_TOP + (03 * (COLOR_CLUSTER_HEIGHT + 3)),
  905.         COLOR_CLUSTER_WIDTH,
  906.         COLOR_CLUSTER_HEIGHT,
  907.         GADGHCOMP,
  908.         RELVERIFY,
  909.         BOOLGADGET,
  910.         (APTR)&ColorClusterBorder,
  911.         NULL,
  912.         &ColorClusterText[03],
  913.         NULL,
  914.         NULL,
  915.         COLOR_CANCEL,
  916.         NULL,
  917.         },
  918.  
  919.         {
  920.         /* COLOR_GREEN */
  921.         &ColorTemplateGadgets[COLOR_CANCEL],
  922.         COLOR_PROP_LEFT,
  923.         COLOR_PROP_TOP + (01 * (COLOR_PROP_HEIGHT + 1)),
  924.         COLOR_PROP_WIDTH,
  925.         COLOR_PROP_HEIGHT,
  926.         GADGHCOMP | GADGIMAGE,
  927.         FOLLOWMOUSE,
  928.         PROPGADGET,
  929.         (APTR)&ColorPropsImages[01],
  930.         NULL,
  931.         NULL,
  932.         NULL,
  933.         (APTR)&ColorPropsInfos[01],
  934.         COLOR_GREEN,
  935.         NULL,
  936.         },
  937.  
  938.         {
  939.         /* COLOR_RED */
  940.         &ColorTemplateGadgets[COLOR_GREEN],
  941.         COLOR_PROP_LEFT,
  942.         COLOR_PROP_TOP + (00 * (COLOR_PROP_HEIGHT + 1)),
  943.         COLOR_PROP_WIDTH,
  944.         COLOR_PROP_HEIGHT,
  945.         GADGHCOMP | GADGIMAGE,
  946.         FOLLOWMOUSE,
  947.         PROPGADGET,
  948.         (APTR)&ColorPropsImages[00],
  949.         NULL,
  950.         NULL,
  951.         NULL,
  952.         (APTR)&ColorPropsInfos[00],
  953.         COLOR_RED,
  954.         NULL,
  955.         },
  956.  
  957.         {
  958.         /* COLOR_BLUE */
  959.         &ColorTemplateGadgets[COLOR_RED],
  960.         COLOR_PROP_LEFT,
  961.         COLOR_PROP_TOP + (02 * (COLOR_PROP_HEIGHT + 1)),
  962.         COLOR_PROP_WIDTH,
  963.         COLOR_PROP_HEIGHT,
  964.         GADGHCOMP | GADGIMAGE,
  965.         FOLLOWMOUSE,
  966.         PROPGADGET,
  967.         (APTR)&ColorPropsImages[02],
  968.         NULL,
  969.         NULL,
  970.         NULL,
  971.         (APTR)&ColorPropsInfos[02],
  972.         COLOR_BLUE,
  973.         NULL,
  974.         },
  975.  
  976.         {
  977.         /* COLOR_HSL_RGB */
  978.         &ColorTemplateGadgets[COLOR_BLUE],
  979.         COLOR_HSL_LEFT,
  980.         COLOR_HSL_TOP,
  981.         CHARACTER_WIDTH + 5,
  982.         COLOR_BOX_BOTTOM - COLOR_BOX_TOP + 1,
  983.         GADGHIMAGE | GADGIMAGE | SELECTED,
  984.         TOGGLESELECT,
  985.         BOOLGADGET,
  986.         (APTR)&ColorRGBImage,
  987.         (APTR)&ColorRGBImage,
  988.         NULL,
  989.         NULL,
  990.         NULL,
  991.         COLOR_HSL_RGB,
  992.         NULL,
  993.         },
  994.     };
  995. MpP[tE`F5< )5JMANDELBROT C SOURCE RJMC source program for R J Mical (Author of Intuition) version of Mandelbrot
  996. program. Use Lattice C 3.03 to compile. You need the following to make up
  997. the whole program: IFF.H MAND.H MAND.C MAND1.C MAND2.C MAND3.C MAND4.C
  998. MAND5.C MAND6.C MAND7.C Example of how to use Intuition from the man that
  999. wrote it.
  1000.